MacHack 1996

home *** CD-ROM | disk | FTP | other *** search

/ MacHack 1996 / MacHack 1996.toast / Hacks / Hacks ’87 / Source ƒ.sit / Source ƒ / modula 2 ƒ / Draw3D (M2) / ThreeDee.DEF < prev next >

MacBinary | 1985-01-01 | 1.4 KB | [TEXT/EDIT]

open in:

MacOS 8.1 extracted |

Win98 extracted |

DOS extracted

view JSON data |

view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: ThreeDee.DEF

Confidence	Program	Detection	Match Type	Support
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Mon Dec 31 23:00:05 1984, modified Mon Dec 31 23:00:05 1984, creator Macintosh Edit, type ASCII, 682 bytes "ThreeDee.DEF" , at 0x32a 490 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default

id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[EDIT]`

hex view

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0c 54 68 72 65 65 44 | 65 65 2e 44 45 46 00 00 |..ThreeD|ee.DEF..|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 45 44 49 | 54 01 00 00 00 00 00 00 |.TEXTEDI|T.......|
|00000050| 00 00 00 00 00 02 aa 00 | 00 01 ea 98 5d 33 45 98 |........|....]3E.|
|00000060| 5d 33 45 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |]3E.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 9e 4b 00 00 |........|.....K..|
|00000080| 44 45 46 49 4e 49 54 49 | 4f 4e 20 4d 4f 44 55 4c |DEFINITI|ON MODUL|
|00000090| 45 20 54 68 72 65 65 44 | 65 65 3b 0d 0d 28 2a 0d |E ThreeD|ee;..(*.|
|000000a0| 20 20 43 68 61 70 74 65 | 72 20 35 3a 20 74 68 72 |  Chapte|r 5: thr|
|000000b0| 65 65 20 64 69 6d 65 6e | 73 69 6f 6e 61 6c 20 74 |ee dimen|sional t|
|000000c0| 72 61 6e 73 66 6f 72 6d | 73 0d 2a 29 0d 0d 46 52 |ransform|s.*)..FR|
|000000d0| 4f 4d 20 51 75 69 63 6b | 44 72 61 77 54 79 70 65 |OM Quick|DrawType|
|000000e0| 73 20 49 4d 50 4f 52 54 | 20 50 6f 69 6e 74 3b 0d |s IMPORT| Point;.|
|000000f0| 0d 45 58 50 4f 52 54 20 | 51 55 41 4c 49 46 49 45 |.EXPORT |QUALIFIE|
|00000100| 44 20 50 6f 69 6e 74 33 | 44 2c 20 53 65 74 50 6f |D Point3|D, SetPo|
|00000110| 69 6e 74 33 44 2c 0d 09 | 09 20 53 65 74 52 6f 74 |int3D,..|. SetRot|
|00000120| 2c 20 53 65 74 53 63 61 | 6c 65 2c 20 53 65 74 54 |, SetSca|le, SetT|
|00000130| 72 61 6e 73 6c 61 74 69 | 6f 6e 2c 20 0d 09 09 20 |ranslati|on, ... |
|00000140| 53 65 74 50 65 72 73 70 | 65 63 74 69 76 65 2c 20 |SetPersp|ective, |
|00000150| 54 72 61 6e 73 66 6f 72 | 6d 53 52 54 2c 20 50 72 |Transfor|mSRT, Pr|
|00000160| 6f 6a 65 63 74 3b 0d 0d | 54 59 50 45 0d 20 20 50 |oject;..|TYPE.  P|
|00000170| 6f 69 6e 74 33 44 20 3d | 20 52 45 43 4f 52 44 0d |oint3D =| RECORD.|
|00000180| 09 20 20 20 20 20 20 58 | 2c 20 59 2c 20 5a 3a 20 |.      X|, Y, Z: |
|00000190| 52 45 41 4c 3b 0d 09 20 | 20 20 20 45 4e 44 3b 0d |REAL;.. |   END;.|
|000001a0| 09 20 20 20 20 0d 50 52 | 4f 43 45 44 55 52 45 20 |.    .PR|OCEDURE |
|000001b0| 53 65 74 50 6f 69 6e 74 | 33 44 28 20 78 2c 20 79 |SetPoint|3D( x, y|
|000001c0| 2c 20 7a 3a 20 52 45 41 | 4c 3b 20 56 41 52 20 70 |, z: REA|L; VAR p|
|000001d0| 3a 20 50 6f 69 6e 74 33 | 44 20 29 3b 0d 0d 50 52 |: Point3|D );..PR|
|000001e0| 4f 43 45 44 55 52 45 20 | 53 65 74 52 6f 74 28 20 |OCEDURE |SetRot( |
|000001f0| 72 6f 74 58 2c 20 72 6f | 74 59 2c 20 72 6f 74 5a |rotX, ro|tY, rotZ|
|00000200| 3a 20 52 45 41 4c 20 29 | 3b 0d 0d 50 52 4f 43 45 |: REAL )|;..PROCE|
|00000210| 44 55 52 45 20 53 65 74 | 53 63 61 6c 65 28 20 73 |DURE Set|Scale( s|
|00000220| 63 61 6c 65 58 2c 20 73 | 63 61 6c 65 59 2c 20 73 |caleX, s|caleY, s|
|00000230| 63 61 6c 65 5a 3a 20 52 | 45 41 4c 20 29 3b 0d 0d |caleZ: R|EAL );..|
|00000240| 50 52 4f 43 45 44 55 52 | 45 20 53 65 74 54 72 61 |PROCEDUR|E SetTra|
|00000250| 6e 73 6c 61 74 69 6f 6e | 28 20 74 72 61 6e 73 58 |nslation|( transX|
|00000260| 2c 20 74 72 61 6e 73 59 | 2c 20 74 72 61 6e 73 5a |, transY|, transZ|
|00000270| 3a 20 52 45 41 4c 20 29 | 3b 0d 0d 50 52 4f 43 45 |: REAL )|;..PROCE|
|00000280| 44 55 52 45 20 53 65 74 | 50 65 72 73 70 65 63 74 |DURE Set|Perspect|
|00000290| 69 76 65 28 20 73 63 72 | 65 65 6e 5a 2c 20 73 6f |ive( scr|eenZ, so|
|000002a0| 75 72 63 65 5a 3a 20 52 | 45 41 4c 20 29 3b 0d 0d |urceZ: R|EAL );..|
|000002b0| 50 52 4f 43 45 44 55 52 | 45 20 54 72 61 6e 73 66 |PROCEDUR|E Transf|
|000002c0| 6f 72 6d 53 52 54 28 20 | 69 6e 3a 20 50 6f 69 6e |ormSRT( |in: Poin|
|000002d0| 74 33 44 3b 20 56 41 52 | 20 6f 75 74 3a 20 50 6f |t3D; VAR| out: Po|
|000002e0| 69 6e 74 33 44 20 29 3b | 0d 0d 50 52 4f 43 45 44 |int3D );|..PROCED|
|000002f0| 55 52 45 20 50 72 6f 6a | 65 63 74 28 20 69 6e 3a |URE Proj|ect( in:|
|00000300| 20 50 6f 69 6e 74 33 44 | 3b 20 56 41 52 20 6f 75 | Point3D|; VAR ou|
|00000310| 74 3a 20 50 6f 69 6e 74 | 20 29 3b 0d 0d 45 4e 44 |t: Point| );..END|
|00000320| 20 54 68 72 65 65 44 65 | 65 2e 00 00 00 00 00 00 | ThreeDe|e.......|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000350| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000360| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000370| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000380| 00 00 01 00 00 00 01 16 | 00 00 00 16 00 00 00 d4 |........|........|
|00000390| 4f 13 00 0d 4f 0d 00 0e | 4f 05 00 01 4f 00 00 02 |O...O...|O...O...|
|000003a0| 4f 00 00 03 4f 00 00 04 | 4f 00 00 05 4f 00 00 06 |O...O...|O...O...|
|000003b0| 0c 54 68 72 65 65 44 65 | 65 2e 44 45 46 fd 02 00 |.ThreeDe|e.DEF...|
|000003c0| 00 00 54 45 58 54 45 44 | 49 54 01 00 ff ff ff ff |..TEXTED|IT......|
|000003d0| 00 00 54 45 58 54 45 44 | 49 54 01 00 ff ff ff ff |..TEXTED|IT......|
|000003e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003f0| 00 00 98 57 6b d9 00 00 | 02 aa 00 00 01 ea 00 01 |...Wk...|........|
|00000400| 11 d6 4f 00 00 19 4f 00 | 00 1a 2c 05 4f 00 00 1b |..O...O.|..,.O...|
|00000410| 3f 0c 50 0c 00 00 f1 c4 | 11 0c 50 12 00 01 11 b8 |?.P.....|..P.....|
|00000420| 17 12 50 18 00 01 11 6c | 17 18 50 1e 00 01 11 4e |..P....l|..P....N|
|00000430| 17 1e 50 24 00 01 11 30 | 17 24 50 2b 00 01 11 12 |..P$...0|.$P+....|
|00000440| 12 2b 4f 00 00 1c 3f 0a | 50 0a 00 00 fb e2 11 0a |.+O...?.|P.......|
|00000450| 50 14 00 01 11 9a 17 14 | 50 1a 00 01 11 6c 17 1a |P.......|P....l..|
|00000460| 50 29 00 01 11 4e 17 29 | 4f 00 00 1d 50 1a 00 01 |P)...N.)|O...P...|
|00000470| 11 6c 07 1a 52 23 00 01 | 20 5a 00 0f fc 15 17 23 |.l..R#..| Z.....#|
|00000480| 00 00 00 0a 00 09 06 4d | 6f 6e 61 63 6f 0e 00 00 |.......M|onaco...|
|00000490| 00 04 00 06 00 08 00 00 | 01 00 00 00 01 16 00 00 |........|........|
|000004a0| 00 16 00 00 00 d4 00 00 | 4e 1c 00 b6 00 00 00 1c |........|N.......|
|000004b0| 00 46 00 01 45 46 4e 54 | 00 00 00 12 45 54 41 42 |.F..EFNT|....ETAB|
|000004c0| 00 00 00 1e 03 eb 00 00 | 00 00 00 00 00 00 eb c4 |........|........|
|000004d0| 03 ec 00 47 00 00 00 0e | 00 00 eb b8 46 4f 42 4a |...G....|....FOBJ|
|000004e0| ff ff ff ff 00 40 01 aa | 00 40 01 ac 00 40 01 ae |.....@..|.@...@..|
|000004f0| 00 40 01 b0 00 40 01 b2 | 00 40 01 b4 00 40 01 b6 |.@...@..|.@...@..|
|00000500| 00 40 01 b8 00 40 10 18 | 00 40 01 bc 00 40 01 be |.@...@..|.@...@..|
|00000510| 00 40 01 be 00 40 01 be | 00 40 01 be 00 40 01 be |.@...@..|.@...@..|
|00000520| 00 40 01 46 4f 42 4a ff | ff ff ff 00 40 01 aa 00 |.@.FOBJ.|....@...|
|00000530| 40 01 ac 00 40 01 ae 00 | 40 01 b0 00 40 01 b2 00 |@...@...|@...@...|
|00000540| 40 01 b4 00 40 01 b6 00 | 40 01 b8 00 40 10 18 00 |@...@...|@...@...|
|00000550| 40 01 bc 00 40 01 be 00 | 40 01 be 00 40 01 be 00 |@...@...|@...@...|
|00000560| 40 01 be 00 40 01 be 00 | 40 01 00 00 00 00 00 00 |@...@...|@.......|
|00000570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+